home *** CD-ROM | disk | FTP | other *** search
Text File | 1995-12-12 | 3.5 KB | 161 lines | [TEXT/MPS ] |
- ;
- ; File: CMPRComponent.a
- ;
- ; Contains: ColorSync ProfileResponder Components Interface
- ;
- ; Version: Technology: ColorSync 2.0
- ; Release: 2.0f3
- ;
- ; Copyright: © 1984-1994 by Apple Computer, Inc.
- ; All rights reserved.
- ;
- ; Bugs?: If you find a problem with this file, send the file and version
- ; information (from above) and the problem description to:
- ;
- ; Internet: apple.bugs@applelink.apple.com
- ; AppleLink: APPLE.BUGS
- ;
- ;
-
- IF &TYPE('__CMPRCOMPONENT__') = 'UNDEFINED' THEN
- __CMPRCOMPONENT__ SET 1
-
-
- IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
- include 'Types.a'
- ENDIF
- ; include 'ConditionalMacros.a' ;
-
- IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
- include 'Quickdraw.a'
- ENDIF
- ; include 'MixedMode.a' ;
- ; include 'QuickdrawText.a' ;
- ; include 'ScriptLayout.a' ;
-
- IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
- include 'Components.a'
- ENDIF
-
- IF &TYPE('__CMAPPLICATION__') = 'UNDEFINED' THEN
- include 'CMApplication.a'
- ENDIF
- ; include 'Files.a' ;
- ; include 'OSUtils.a' ;
- ; include 'Memory.a' ;
- ; include 'Finder.a' ;
- ; include 'Printing.a' ;
- ; include 'Errors.a' ;
- ; include 'Dialogs.a' ;
- ; include 'Windows.a' ;
- ; include 'Events.a' ;
- ; include 'Controls.a' ;
- ; include 'Collections.a' ;
- ; include 'Appearance.a' ;
- ; include 'TextObjects.a' ;
- ; include 'Unicode.a' ;
- ; include 'Menus.a' ;
- ; include 'AppleEvents.a' ;
- ; include 'EPPC.a' ;
- ; include 'AppleTalk.a' ;
- ; include 'PPCToolbox.a' ;
- ; include 'Processes.a' ;
- ; include 'Notification.a' ;
- ; include 'Kernel.a' ;
- ; include 'MachineExceptions.a' ;
- ; include 'Timing.a' ;
- ; include 'Drag.a' ;
- ; include 'TextEdit.a' ;
- ; include 'CMICCProfile.a' ;
-
- CMPRInterfaceVersion EQU 0
-
- ; Component function selectors
- kCMPRGetProfile EQU 0
- kCMPRSetProfile EQU 1
- kCMPRSetProfileDescription EQU 2
- kCMPRGetIndexedProfile EQU 3
- kCMPRDeleteDeviceProfile EQU 4
-
- ;
- ; pascal CMError CMGetProfile(ComponentInstance pr, CMProfileHandle aProfile, CMProfileHandle *returnedProfile)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CMGetProfile
- dc.w $2F3C
- dc.w $0000
- dc.w $0000
- moveq #0,d0
- dc.w $A82A
- EndM
- ELSE
- IMPORT CMGetProfile
- ENDIF
-
- ;
- ; pascal CMError CMSetProfile(ComponentInstance pr, CMProfileHandle newProfile)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CMSetProfile
- dc.w $2F3C
- dc.w $0000
- dc.w $0000
- moveq #0,d0
- dc.w $A82A
- EndM
- ELSE
- IMPORT CMSetProfile
- ENDIF
-
- ;
- ; pascal CMError CMSetProfileDescription(ComponentInstance pr, long DeviceData, CMProfileHandle hProfile)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CMSetProfileDescription
- dc.w $2F3C
- dc.w $0000
- dc.w $0000
- moveq #0,d0
- dc.w $A82A
- EndM
- ELSE
- IMPORT CMSetProfileDescription
- ENDIF
-
- ;
- ; pascal CMError CMGetIndexedProfile(ComponentInstance pr, CMProfileSearchRecordHandle search, CMProfileHandle *returnProfile, long *index)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CMGetIndexedProfile
- dc.w $2F3C
- dc.w $0002
- dc.w $0000
- moveq #0,d0
- dc.w $A82A
- EndM
- ELSE
- IMPORT CMGetIndexedProfile
- ENDIF
-
- ;
- ; pascal CMError CMDeleteDeviceProfile(ComponentInstance pr, CMProfileHandle deleteMe)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CMDeleteDeviceProfile
- dc.w $2F3C
- dc.w $0000
- dc.w $0000
- moveq #0,d0
- dc.w $A82A
- EndM
- ELSE
- IMPORT CMDeleteDeviceProfile
- ENDIF
-
- ENDIF ; __CMPRCOMPONENT__
-